
Imports System

Namespace _2bMatesSite
	''' <summary>
	''' Summary description for Global.
	''' </summary>
	Public Class [Global]
		Inherits System.Web.HttpApplication
		''' <summary>
		''' Required designer variable.
		''' </summary>
		Private components As System.ComponentModel.IContainer = Nothing

		Public Sub New()
			InitializeComponent()
		End Sub

		Protected Sub Application_Start(ByVal sender As Object, ByVal e As EventArgs)
			' get settings from the application config file
			Constants.CONN_STRING = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appConnectionString)
			Constants.BUILD_MAJOR = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appBuildMajorNumber)
			Constants.BUILD_MINOR = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appBuildMinorNumber)
			Constants.APPLICATION_URL = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appApplicationURL)

			'			Constants.SKYSCR_ADV_CODE = "<!-- BEGIN GERMIN8 MEDIA AD CODE BLOCK -->" + Environment.NewLine
			'										+ "<SCRIPT language=\"JavaScript\" type=\"text/javascript\">" + Environment.NewLine
			'										+ "<!--" + Environment.NewLine
			'										+ "var bust = Math.floor(89999999*Math.random()+10000000);" + Environment.NewLine 
			'										+ "document.writeln('<IFRAME src=\"http://adserve.germin8.com/advertpro/servlet/view/banner/html/zone?zid=110&pid=21&random='+bust+'\" height=\"600\" width=\"120\" hspace=\"0\" vspace=\"0\" frameborder=\"0\" marginwidth=\"0\" marginheight=\"0\" scrolling=\"no\">');" + Environment.NewLine
			'										+ "document.writeln('<A href=\"http://adserve.germin8.com/advertpro/servlet/click/zone?zid=110&pid=21&lookup=true&random='+bust+'\" target=\"_top\">');" + Environment.NewLine
			'										+ "document.writeln('<IMG src=\"http://adserve.germin8.com/advertpro/servlet/view/banner/image/zone?zid=110&pid=21&random='+bust+'\" height=\"600\" width=\"120\" hspace=\"0\" vspace=\"0\" border=\"0\" alt=\"Click Here!\">');" + Environment.NewLine
			'										+ "document.writeln('</A>');" + Environment.NewLine
			'										+ "document.writeln('</IFRAME>');" + Environment.NewLine
			'										+ "//-->" + Environment.NewLine
			'										+ "</SCRIPT>" + Environment.NewLine
			'										+ "<NOSCRIPT>" + Environment.NewLine
			'										+ "<IFRAME src=\"http://adserve.germin8.com/advertpro/servlet/view/banner/html/zone?zid=110&pid=21\" height=\"600\" width=\"120\" hspace=\"0\" vspace=\"0\" frameborder=\"0\" marginwidth=\"0\" marginheight=\"0\" scrolling=\"no\"><A href=\"http://adserve.germin8.com/advertpro/servlet/click/zone?zid=110&pid=21&lookup=true&position=1\" target=\"_top\"><IMG src=\"http://adserve.germin8.com/advertpro/servlet/view/banner/image/zone?zid=110&pid=21&position=1\" height=\"600\" width=\"120\" hspace=\"0\" vspace=\"0\" border=\"0\" alt=\"Click Here!\"></A></IFRAME>" + Environment.NewLine
			'										+ "</NOSCRIPT>" + Environment.NewLine
			'										+ "<!-- END GERMIN8 MEDIA AD CODE BLOCK -->";

			Constants.SKYSCR_ADV_CODE = "&nbsp;"

			' get settings from the DB
			' NOTE: this has to come AFTER reading the connection string, since it uses the DB connection

			' --- Server values
			'
			'			Constants.SMTP_SERVER = "smtp.fasthosts.co.uk";	
			'
			'			Constants.CONTACT_US_EMAIL = "contactus@2bmates.com";
			'			Constants.MESSAGES_EMAIL = "messages@2bmates.com";
			'			Constants.INVITATION_EMAIL = "invitation@2bmates.com";

			' --- END Server values

			' --- Local values


			Constants.SMTP_SERVER = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appWC_SMTPServer)
			Constants.CONTACT_US_EMAIL = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appWC_CONTACT_US_EMAIL)
			Constants.MESSAGES_EMAIL = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appWC_MESSAGES_EMAIL)
			Constants.INVITATION_EMAIL = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appWC_INVITATION_EMAIL)

			' --- New server values

			'			Constants.SMTP_SERVER = "mail.2bmates.com";
			'	
			'			Constants.CONTACT_US_EMAIL = "contactus@2bmates.com";
			'			Constants.MESSAGES_EMAIL = "messages@2bmates.com";
			'			Constants.INVITATION_EMAIL = "invitation@2bmates.com";

			' --- END New server values

			' --- show special pages constants
			Constants.SHOW_GAMES = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appWC_SHOW_GAMES)
			Constants.SHOW_MUSIC = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appWC_SHOW_MUSIC)
			Constants.SHOW_GROUPS = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appWC_SHOW_GROUPS)
			Constants.SHOW_HELP = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appWC_SHOW_HELP)

			' forum
			Constants.HAS_FORUM = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appWC_HAS_FORUM)
			If Constants.HAS_FORUM = Constants.SHOW_ON Then
				Constants.FORUM_DB_CONN_STRING = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appForumConnString)
				Constants.FORUM_BOARD_ID = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appWC_FORUM_BOARD_ID)
				Constants.CHAT_DB_CONN_STRING = System.Configuration.ConfigurationSettings.AppSettings.[Get](Constants.appChatConnString)
			End If
			' ---

			Constants.INITIAL_PASS_LENGTH = 11

			Constants.WELCOME_MESSAGE_SENDER = "mnadjm@hotmail.com"
			'"maz@hotmail.com";
			Constants.WELCOME_MESSAGE_SUBJECT = "Welcome to 2Bmates."
			Constants.WELCOME_MESSAGE_BODY = Environment.NewLine + Environment.NewLine + "Welcome to 2Bmates, the best way to keep in touch and meet new friends on the Net!" + Environment.NewLine + Environment.NewLine + "I'm Maz, and I'm here to help you with 2Bmates and" + " would like to know what you think of us. If you have questions, comments," + " or just want to say Hi, please send me a message! " + " You can also check the <a href='" + Constants.HELP + "' >help page</a> to find out how this site works. " + Environment.NewLine + Environment.NewLine + "<b>How to get started?</b> " + Environment.NewLine + Environment.NewLine + "On 2Bmates you share profile, photos, blogs, and messages " + "with a fast-growing network of people connected to you by your friends. " + Environment.NewLine + Environment.NewLine + "Invite your friends to join, and then when they invite their friends you'll all be connected! " + Environment.NewLine + Environment.NewLine + "Click Here: <a href='" + Constants.INVITE_FRIENDS + "' >Invite Friends</a> " + Environment.NewLine + Environment.NewLine + "I'll see you on 2Bmates! " + Environment.NewLine + Environment.NewLine + "Maz "

			Constants.NOTIFY_NEW_FRIEND_SUBJECT = "2BMates: " + Constants.TXT_USER_NAME_TAG + " is now your friend!"
			Constants.NOTIFY_NEW_FRIEND_BODY = Environment.NewLine + "Your request has been approved by " + Constants.TXT_USER_NAME_TAG + " and is now in your friends list." + Environment.NewLine + Environment.NewLine + "You and " + Constants.TXT_USER_NAME_TAG + " can view each other's pages and each other's friends." + Environment.NewLine + Environment.NewLine + "Log in to 2Bmates to see your list of friends:" + Environment.NewLine + "www.2bmates.com" + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_FRIEND_REQUEST_SUBJECT = "New Friend Request from " + Constants.TXT_USER_NAME_TAG + " on 2Bmates"
			Constants.NOTIFY_FRIEND_REQUEST_BODY = Environment.NewLine + Constants.TXT_USER_NAME_TAG + " has requested to be added to " + Environment.NewLine + "your friends list at 2Bmates. Please confirm that you are friends." + Environment.NewLine + Environment.NewLine + "Click here to approve or reject this request by accessing the 2Bmates web site:" + Environment.NewLine + Constants.TXT_FRIENDSHIP_REQUEST_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_NEW_GROUP_MAIL_SUBJECT = "New Group mail from " + Constants.TXT_USER_NAME_TAG + " on 2Bmates"
			Constants.NOTIFY_NEW_GROUP_MAIL_BODY = Environment.NewLine + "You've got a new group message from " + Constants.TXT_USER_NAME_TAG + " on 2Bmates." + Environment.NewLine + Environment.NewLine + "Please click here to read your 2Bmates messages:" + Environment.NewLine + Constants.TXT_MAIL_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_NEW_MAIL_SUBJECT = "New mail from " + Constants.TXT_USER_NAME_TAG + " on 2Bmates"
			Constants.NOTIFY_NEW_MAIL_BODY = Environment.NewLine + "You've got a new message from " + Constants.TXT_USER_NAME_TAG + " on 2Bmates." + Environment.NewLine + Environment.NewLine + "Please click here to read your 2Bmates messages:" + Environment.NewLine + Constants.TXT_MAIL_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_NEW_BULLETIN_SUBJECT = "New bulletin from " + Constants.TXT_USER_NAME_TAG + " on 2Bmates"
			Constants.NOTIFY_NEW_BULLETIN_BODY = Environment.NewLine + "You've got a new bulletin from " + Constants.TXT_USER_NAME_TAG + " on 2Bmates." + Environment.NewLine + Environment.NewLine + "Please click here to read your 2Bmates messages:" + Environment.NewLine + Constants.TXT_MAIL_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_NEW_GROUP_BULLETIN_MODERATOR_SUBJECT = "New Group bulletin message from " + Constants.TXT_USER_NAME_TAG + " on 2Bmates"
			Constants.NOTIFY_NEW_GROUP_BULLETIN_MODERATOR_BODY = "You've got a new Group bulletin message from " + Constants.TXT_USER_NAME_TAG + " on 2Bmates" + Environment.NewLine + Environment.NewLine + "Please click here to read your 2Bmates Group bulletin messages:" + Environment.NewLine + Constants.TXT_GROUP_BULLETIN_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_NEW_USER_COMMENT_SUBJECT = "New comment about you on 2Bmates"
			Constants.NOTIFY_NEW_USER_COMMENT_BODY = Environment.NewLine + Constants.TXT_USER_NAME_TAG + " has posted a new comment about you on 2Bmates." + Environment.NewLine + Environment.NewLine + "Please click the link below to read your comment:" + Environment.NewLine + Constants.TXT_COMMENT_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_NEW_BLOG_SUBJECT = "New Blog comment on 2Bmates"
			Constants.NOTIFY_NEW_BLOG_BODY = Environment.NewLine + Constants.TXT_USER_NAME_TAG + " has posted a new comment about one of your Blogs on 2Bmates." + Environment.NewLine + Environment.NewLine + "Please click on the link below to read your comment:" + Environment.NewLine + Constants.TXT_BLOG_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_NEW_GROUP_BLOG_SUBJECT = "New Group Blog comment on 2Bmates"
			Constants.NOTIFY_NEW_GROUP_BLOG_BODY = Environment.NewLine + Constants.TXT_USER_NAME_TAG + " has posted a new comment about one of your Group Blogs on 2Bmates." + Environment.NewLine + Environment.NewLine + "Please click on the link below to read your comment:" + Environment.NewLine + Constants.TXT_BLOG_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_UPDATED_BLOG_SUBJECT = "Updated Blog comment on 2BMates"
			Constants.NOTIFY_UPDATED_BLOG_BODY = Environment.NewLine + Constants.TXT_USER_NAME_TAG + " has updated a comment about one of your Blogs on 2BMates." + Environment.NewLine + Environment.NewLine + "Please click on the link below to read your comment:" + Environment.NewLine + Constants.TXT_BLOG_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_UPDATED_GROUP_BLOG_SUBJECT = "Updated Group Blog comment on 2BMates"
			Constants.NOTIFY_UPDATED_GROUP_BLOG_BODY = Environment.NewLine + Constants.TXT_USER_NAME_TAG + " has updated a comment about one of your Group Blogs on 2BMates." + Environment.NewLine + Environment.NewLine + "Please click on the link below to read your comment:" + Environment.NewLine + Constants.TXT_BLOG_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_NEW_PRIVATE_GROUP_MEMBER_SUBJECT = "Membership request to join the " + Constants.TXT_GROUP_NAME_TAG + " group"
			Constants.NOTIFY_NEW_PRIVATE_GROUP_MEMBER_BODY = Environment.NewLine + Constants.TXT_USER_NAME_TAG + " has requested to become a member of the " + Constants.TXT_GROUP_NAME_TAG + " group." + Environment.NewLine + "Please confirm " + Constants.TXT_USER_NAME_TAG + "'s membership." + Environment.NewLine + Environment.NewLine + "Click here to approve or reject this request by accessing the 2Bmates web site:" + Environment.NewLine + Constants.TXT_MEMBERSHIP_REQUEST_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_NEW_PUBLIC_GROUP_MEMBER_SUBJECT = "A new member has joined your Group on 2Bmates"
			Constants.NOTIFY_NEW_PUBLIC_GROUP_MEMBER_BODY = Environment.NewLine + Constants.TXT_USER_NAME_TAG + " has joined your group " + Constants.TXT_GROUP_NAME_TAG + "." + Environment.NewLine + Environment.NewLine + "Click here to log in and check out the Group:" + Environment.NewLine + Constants.TXT_GROUP_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_MEMBERSHIP_ACCEPTED_SUBJECT = "Group: " + Constants.TXT_GROUP_NAME_TAG + " is now in your groups list!"
			Constants.NOTIFY_MEMBERSHIP_ACCEPTED_BODY = Environment.NewLine + "Your request has been approved by " + Constants.TXT_GROUP_NAME_TAG + " and the group is now in your groups." + Environment.NewLine + Environment.NewLine + Environment.NewLine + "Log in to 2Bmates to see your list of groups:" + Environment.NewLine + Constants.TXT_SEE_MY_GROUPS_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_MEMBERSHIP_CANCELED_SUBJECT = "Removal from Group " + Constants.TXT_GROUP_NAME_TAG
			Constants.NOTIFY_MEMBERSHIP_CANCELED_BODY = Environment.NewLine + "Sorry to say, but you have been removed from Group " + Constants.TXT_GROUP_NAME_TAG + " by the moderator." + Environment.NewLine + Environment.NewLine + Constants.TXT_SEE_MY_GROUPS_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

				'"mailto:privacy@2bmates.com" + Environment.NewLine
			Constants.NO_SPAM_DISCLAIMER = "2Bmates is strongly against any e-solicitation." + " Please bear in mind that emails sent to your external accounts are to facilitate your use" + " as a member of this site. If you don�t want to receive anything on your external email" + " accounts, please change your Account Settings to ""Do not send me notification emails.""" + Environment.NewLine + Environment.NewLine + "Please click here to change your Account Settings:" + Environment.NewLine + Constants.TXT_ACC_LINK_TAG + Environment.NewLine + Environment.NewLine + "If you have any questions or concerns regarding your privacy contact us at:" + Environment.NewLine + Constants.TXT_PRIVACY_MAIL_LINK + Environment.NewLine + Environment.NewLine + Environment.NewLine + Server.HtmlDecode("&copy;") + "2004 - " + DateTime.Now.Year.ToString() + " 2Bmates.com. All Rights Reserved." + Environment.NewLine
			'+ "�2004 - " + DateTime.Now.Year.ToString() + " 2Bmates.com. All Rights Reserved." + Environment.NewLine;
			Constants.INVITE_MAIL_SUBJECT = Constants.TXT_USER_NAME_TAG + " invites you to 2Bmates"
			Constants.INVITE_MAIL_BODY = Environment.NewLine + Environment.NewLine + Constants.TXT_USER_NAME_TAG + " has invited you to join the 2Bmates.com social networking site. Here you can network with friends� friends and vice versa." + Environment.NewLine + Constants.TXT_USER_TEXT_TAG + Environment.NewLine + "2Bmates is an online community, which links people together through a network of friends. It is up to you how you want to use the network, whether it�s for making more friends, meeting that special someone or even for business purposes." + Environment.NewLine + Environment.NewLine + "2Bmates give you the opportunity to:" + Environment.NewLine + Environment.NewLine + " - Meet new mates" + Environment.NewLine + " - Help your friends meet new people" + Environment.NewLine + " - Meet new people to date through friends and their friends� friends" + Environment.NewLine + " - Develop a circle of friends and see it expand." + Environment.NewLine + Environment.NewLine + "Once you join you will instantly be linked to your friend and their network of friends." + Environment.NewLine + Environment.NewLine + "Click below to join 2Bmates:" + Environment.NewLine + Environment.NewLine + Constants.TXT_REG_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine

			Constants.INVITE_TO_GROUP_MAIL_SUBJECT = "Invitation to join the " + Constants.TXT_GROUP_NAME_TAG + " Group on 2Bmates"
			Constants.INVITE_TO_GROUP_MAIL_BODY = Environment.NewLine + "You have been invited to join the " + Constants.TXT_GROUP_NAME_TAG + " Group on 2Bmates." + Environment.NewLine + "Click here to log in and check out the Group:" + Environment.NewLine + Environment.NewLine + Constants.TXT_GRP_PROFILE_LINK_TAG + Environment.NewLine + Environment.NewLine + Constants.TXT_USER_TEXT_TAG + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_GROUP_CANCELED_SUBJECT = "Cancellation of " + Constants.TXT_GROUP_NAME_TAG + " on 2Bmates"
			Constants.NOTIFY_GROUP_CANCELED_BODY = Constants.TXT_USER_NAME_TAG + " we are sorry to say that " + Constants.TXT_GROUP_NAME_TAG + " has been cancelled by the Moderator." + Environment.NewLine + Environment.NewLine + "This group no long exists and cannot be visited again." + Environment.NewLine + Environment.NewLine + "You can always create your own Group or join similar groups!" + Environment.NewLine + Environment.NewLine + Constants.TXT_GROUPS_MAIN_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_GROUP_CANCELED_MODERATOR_SUBJECT = "Cancellation of " + Constants.TXT_GROUP_NAME_TAG + " on 2Bmates"
			Constants.NOTIFY_GROUP_CANCELED_MODERATOR_BODY = "We are sorry to hear that you have cancelled your group. " + Environment.NewLine + Environment.NewLine + "The Group: " + Constants.TXT_GROUP_NAME_TAG + " has now been cancelled." + Environment.NewLine + Environment.NewLine + "If you wish to create another group please visit 2Bmates:" + Environment.NewLine + Environment.NewLine + Constants.TXT_GROUPS_MAIN_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.NOTIFY_NEW_GROUP_COMMENT_MODERATOR_SUBJECT = "New Group comment about your group on 2Bmates"
			Constants.NOTIFY_NEW_GROUP_COMMENT_MODERATOR_BODY = Constants.TXT_USER_NAME_TAG + " has posted a new comment about your Group: " + Constants.TXT_GROUP_NAME_TAG + " on 2Bmates." + Environment.NewLine + Environment.NewLine + "Please click the link below to read your comment:" + Environment.NewLine + Environment.NewLine + Constants.TXT_GROUP_COMMENTS_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.PASS_MAIL_SUBJECT = "2Bmates Reset Password"
			Constants.PASS_MAIL_BODY = Environment.NewLine + "Hi " + Constants.TXT_USER_NAME_TAG + Environment.NewLine + Environment.NewLine + "Your 2Bmates password was reset." + Environment.NewLine + Environment.NewLine + "Please click on the link below to login, and change your password:" + Environment.NewLine + Constants.TXT_REG_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.REG_MAIL_SUBJECT = "2Bmates Account Confirmation"
			Constants.REG_MAIL_BODY = Environment.NewLine + "Hi " + Constants.TXT_USER_NAME_TAG + Environment.NewLine + Environment.NewLine + "Welcome to 2Bmates, the best way to link up with friends." + Environment.NewLine + Environment.NewLine + "2Bmates.com is an online networking community where old and new friends meet to make more friends, share interests, pictures, music, information with your growing circle of friends!" + Environment.NewLine + Environment.NewLine + "Please click on the link below to verify your 2Bmates email address:" + Environment.NewLine + Constants.TXT_REG_LINK_TAG + Environment.NewLine + Environment.NewLine + "NOTE: If your email program does not open the link correctly, you may need to copy and paste above URL into a new browser window." + Environment.NewLine + Environment.NewLine + "-------------------------" + Environment.NewLine + Environment.NewLine + Constants.TXT_DISCLAIMER_TEXT_TAG

			Constants.FEEDBACK_MAIL_SUBJECT = "2Bmates user feedback (account cancellation)"
			Constants.FEEDBACK_MAIL_BODY = Environment.NewLine + "The 2Bmates registered user '" + Constants.TXT_USER_NAME_TAG + "', '" + Constants.TXT_USER_EMAIL_TAG + "' has submitted the following feedback." + Environment.NewLine + "===================" + Environment.NewLine + Constants.TXT_USER_TEXT_TAG + Environment.NewLine + "==================="
			Constants.FEEDBACK_NONE = "<no feedback>"

			Constants.MESSAGE_FORWARD_A_FRIEND_SUBJECT = "Please check out my friend's profile"
			Constants.MESSAGE_FORWARD_A_FRIEND_BODY = "Check this link out:"

			Constants.MESSAGE_RECOMMEND_A_MATCH_SUBJECT = "Match recommendation from " + Constants.TXT_RECOMMENDED_FROM_TAG + "!"
			Constants.MESSAGE_RECOMMEND_A_MATCH_BODY = "Check these links out!" + Environment.NewLine + Environment.NewLine + Constants.TXT_RECOMMEND_A_MATCH_LINK1_TAG + Environment.NewLine + Environment.NewLine + Constants.TXT_RECOMMEND_A_MATCH_LINK2_TAG

			Constants.MESSAGE_FORWARD_A_GROUP_SUBJECT = "Interesting group"
			Constants.MESSAGE_FORWARD_A_GROUP_BODY = "Check this group out:"

			Constants.BULLETIN_SEND_GAME_SUBJECT = "Check this game out!"

			Constants.PICTURE_LARGE_THUMB_WIDTH = 130
			Constants.PICTURE_LARGE_THUMB_HEIGHT = 160
			Constants.PICTURE_THUMB_WIDTH = 70
			Constants.PICTURE_THUMB_HEIGHT = 120
			Constants.PICTURE_MAX_WIDTH = 640
			Constants.PICTURE_MAX_HEIGHT = 480
			Constants.PICTURE_MAX_SIZE = 2097152
			' 2M
			Constants.FRIENDSHIP_MAX_REQUESTS = 2
			Constants.MEMBERSHIP_MAX_REQUESTS = 2

			Constants.COUNTRIES = New BO.Countries()
			Constants.LINKTYPES = New BO.LinkTypes()
			Constants.CATEGORIES = New BO.Categories()
			Constants.GENRE = New BO.GroupGenres()
			Constants.LABELTYPES = New BO.LabelTypes()

			' Create browse cookie
		End Sub

		Protected Sub Application_PreRequestHandlerExecute(ByVal sender As Object, ByVal e As EventArgs)
			Try
				If Session <> Nothing Then
					Session(Constants.ssnLastUserRequestTime) = DateTime.Now
				End If
			Catch
			End Try
		End Sub

		Protected Sub Application_BeginRequest(ByVal sender As Object, ByVal e As EventArgs)

		End Sub

		Protected Sub Application_EndRequest(ByVal sender As Object, ByVal e As EventArgs)

		End Sub

		Protected Sub Application_AuthenticateRequest(ByVal sender As Object, ByVal e As EventArgs)

		End Sub

		Protected Sub Application_Error(ByVal sender As Object, ByVal e As EventArgs)
			Session(Constants.ssnLastError) = Server.GetLastError().GetBaseException()
			Server.Transfer(Constants.ERROR_PAGE)
		End Sub

		Protected Sub Session_End(ByVal sender As Object, ByVal e As EventArgs)
			' Remove the Session object from the Sessions table
			If Constants.SESSIONS.ContainsKey(Session.SessionID) Then
				Constants.SESSIONS.Remove(Session.SessionID)
			End If
		End Sub

		Protected Sub Application_End(ByVal sender As Object, ByVal e As EventArgs)

		End Sub

		#region Web Form Designer generated code
		''' <summary>
		''' Required method for Designer support - do not modify
		''' the contents of this method with the code editor.
		''' </summary>
		Private Sub InitializeComponent()
			Me.components = New System.ComponentModel.Container()
		End Sub
#End Region
	End Class
End Namespace







